Namespace Controls
    <Serializable(), ObfuscationAttribute(Exclude:=True, ApplyToMembers:=True)> _
    Public Class DataGridSetting
        Inherits DataStream.StreamControlSetting

        <NonSerialized()> _
        Private mGridScale As Boolean = False

        Sub New(ByVal Name As String, ByVal Colour As System.Drawing.Color, Optional ByVal Visible As Boolean = False)
            MyBase.New(Name, Colour, Visible)
        End Sub

        Public Property isGridScale() As Boolean
            Get
                Return mGridScale
            End Get
            Set(ByVal value As Boolean)
                mGridScale = value
            End Set
        End Property

        Overrides Property Visible() As Boolean
            Get
                Return MyBase.Visible Or mGridScale
            End Get
            Set(ByVal value As Boolean)
                MyBase.Visible = value
            End Set
        End Property

    End Class
End Namespace
